Selasa, 14 November 2017

Tugas 3 Penjumlahan Tidak Menggunakan Keypress

Tugas 3 Penjumlahan Tidak Menggunakan Keypress



Option Explicit

Private Sub Cmdhitung_Click()
txttotal = Val(txtnilai1) + Val(txtnilai2)
End Sub

Private Sub Cmdlagi_Click()
txtnilai1 = ""
txtnilai2 = ""
txttotal = ""
txtnilai1.SetFocus
End Sub

Private Sub Cmdkeluar_Click()
Unload Me

End Sub

Tidak ada komentar:

Posting Komentar

Featured Post

Tutorial

Tutorial membuat thresholding (program matlab) Thresholding  merupakan salah satu metode segmentasi citra di mana prosesnya didasa...